home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_300 / 310_01 / env.h < prev    next >
Encoding:
C/C++ Source or Header  |  1990-04-18  |  6.2 KB  |  205 lines
  1. /*
  2.     Little Smalltalk
  3.  
  4.     execution environment definitions.
  5.  
  6. The Little Smalltalk system is tailored to various machines by
  7. changing defined constants.  These constants, and their meanings,
  8. are as follows:
  9.  
  10. CURSES    defined if the curses(3) library is available and the primitive
  11.     graphics it provides is desired
  12.  
  13. GAMMA    defined if gamma() is part of the math library
  14.  
  15. ENVSAVE    defined if it is required to save environ during fast load
  16.  
  17. FACTMAX    maximum integer value for which a factorial can be computed by
  18.     repeated multiplication without overflow.
  19.  
  20. FASTDEFAULT    defined if the default behavior should be to do a fast load
  21.  
  22. FLUSHREQ    if defined a fflush is given after every call to printf
  23.         or fprintf
  24.  
  25. INLINE    generate inline code for increments or decrements -
  26.     produces larger, but faster, code.
  27.  
  28. MDWINDOWS    defined if the maryland windows package is used
  29.  
  30. NOSYSTEM    defined if the system() call is NOT provided
  31.         (seriously limits functionality)
  32.  
  33. OPEN3ARG    defined if 3 argument style opens are used
  34.  
  35. PLOT3    defined if you have a device for which the plot(3) routines work
  36.     directly on the terminal (without a filter)
  37.     provides many of these routines as primitive operations
  38.     (see class PEN in /prelude)
  39.  
  40. SMALLDATA    if defined various means are used to reduce the size of the
  41.         data segment, at the expense of some functionality.
  42.  
  43. SIGS        define in the signal system call is available
  44.         for trapping user interrupt signals
  45.  
  46. SETJUMP        defined if the setjump facility is available 
  47.  
  48.     In addition to defining constants, the identifier type ``unsigned
  49. character'' needs to be defined.  Bytecodes are stored using this datatype.
  50. On machines which do not support this datatype directly, macros need to be
  51. defined that convert normal chars into unsigned chars.  unsigned chars are
  52. defined by a typedef for ``uchar'' and a pair of macros that convert an int
  53. into a uchar and vice-versa.
  54.  
  55.     In order to simplify installation on systems to which the
  56. Little Smalltalk system has already been ported, various ``meta-defines''
  57. are recognized.  By defining one of these symbols, the correct definitions
  58. for other symbols will automatically be generated.  The currently
  59. recognized meta-defines are as follows:
  60.     
  61. BERK42    Vax Berkeley 4.2
  62. DECPRO    Dec Professional 350 running Venix
  63. HP9000    Hewlett Packard 9000
  64. PDP1170    PdP 11/70 (also other PDP 11 machines)
  65. PERKELM    Perken Elmer 8/32
  66. RIDGE    Ridge ROS 3.1
  67. IBMPC   IBM PC/AT with MSDOS, Microsoft C v4.0
  68.  
  69.     Finally, a few path names have to be compiled into the code.
  70. These path names are the following:
  71.  
  72. TEMPFILE - a temporary file name in mktemp format
  73. PARSER - the location of the parser
  74. PRELUDE - the location of the standard prelude in ascii format
  75. FAST - the location of the standard prelude in saved format
  76. LIBLOC - the location of the directory for additional libraries
  77.  
  78. */
  79.  
  80. /* 
  81. # define TEMPFILE "/usr/tmp/stXXXXXX"
  82. # define PARSER   "/users/budd/Projects/smalltalk/bin/parse"
  83. # define PRELUDE  "/users/budd/Projects/smalltalk/prelude/standard"
  84. # define FAST     "/users/budd/Projects/smalltalk/prelude/stdsave"
  85. # define LIBLOC      "/users/budd/Projects/smalltalk/prelude"
  86. */
  87.  
  88. /* ------------------MSDOS directory names */
  89.  
  90. # define TEMPFILE "\\lst\\tmp\\stXXXXXX"
  91. # define PARSER   "\\lst\\parser\\parse"
  92. # define PRELUDE  "\\lst\\prelude\\standard"
  93. # define FAST     "\\lst\\prelude\\stdsave"
  94. # define LIBLOC      "\\lst\\prelude"
  95.  
  96. /* >>>>>>>>>>>>>>>>>>>>>>>>>>>>>meta-define <<<<<<<<<<<<<<<*/
  97.  
  98. # define IBMPC
  99.  
  100. /*------------------------------  IBM PC with MSDOS, Microsoft C v4.0 */
  101.  
  102. # ifdef IBMPC
  103.  
  104. # define FACTMAX 8
  105. # define SIGS
  106. # define SETJUMP
  107. typedef unsigned char uchar;
  108. # define itouc(x) ((uchar) x)
  109. # define uctoi(x) ((int) x)
  110.  
  111. # endif                 /* end of IBM PC definition */
  112.  
  113. /*------------------------------  VAX Berkeley 4.2 definition */
  114. # ifdef BERK42
  115.  
  116. # define GAMMA        /* gamma value is known */
  117. # define FACTMAX 12
  118. # define FLUSHREQ    /* flush after every printf */
  119. # define SIGS
  120. # define SETJUMP
  121. typedef unsigned char uchar;
  122. # define itouc(x) ((uchar) x)
  123. # define uctoi(x) ((int) x)
  124. /* # define MDWINDOWS */
  125. /* FASTLOADING DOES work, and should eventually be defined to be standard*/
  126. /*# define FASTDEFAULT*/    /* default to fast-loading */
  127.  
  128. # endif        /* BERK42 definition */
  129.  
  130. /*------------------------------  HP 9000 / HP - UX definition */
  131. # ifdef HP9000
  132.  
  133. # define GAMMA        /* gamma value is known */
  134. # define FACTMAX 12
  135. # define FLUSHREQ    /* flush after every printf */
  136. # define SIGS
  137. # define SETJUMP
  138. typedef unsigned char uchar;
  139. # define itouc(x) ((uchar) x)
  140. # define uctoi(x) ((int) x)
  141.  
  142. # endif        /* HP 9000 definition */
  143.  
  144. /* ---------------------------------------RIDGE ROS 3.1 definition */
  145. # ifdef RIDGE
  146.  
  147. # define GAMMA        /* gamma value is known */
  148. # define FACTMAX 12
  149. typedef unsigned char uchar;
  150. # define itouc(x) ((uchar) x)
  151. # define uctoi(x) ((int) x)
  152.  
  153. # endif        /* RIDGE definition */
  154.  
  155. /* --------------------------------------------DEC PRO definitions */
  156. # ifdef DECPRO
  157.  
  158. /* GAMMA, OPEN3ARG not defined */
  159. # define ENVSAVE
  160. # define FACTMAX 8
  161. # define SMALLDATA
  162. /* unsigned characters not supported, but can be simulated */
  163. typedef char uchar;
  164. # define itouc(x) ((uchar) x)
  165. # define uctoi(x) (unsigned) (x >= 0 ? x : x + 256)
  166.  
  167. # endif        /* DECPRO definition */
  168.  
  169. /* --------------------------------------------PDP11/70 definitions */
  170. # ifdef PDP1170
  171.  
  172. /* GAMMA, OPEN3ARG not defined */
  173. # define ENVSAVE
  174. # define FACTMAX 8
  175. # define FLUSHREQ
  176. # define SIGS
  177. # define SETJUMP
  178. /* unsigned characters not supported, but can be simulated */
  179. typedef char uchar;
  180. # define itouc(x) ((uchar) x)
  181. # define uctoi(x) (unsigned) (x >= 0 ? x : x + 256)
  182.  
  183. # endif        /* PDP1170 definition */
  184.  
  185. /*------------------------------  Perkin Elmer 8/32 definitions */
  186. # ifdef PERKELM
  187.  
  188. # define ENVSAVE
  189. # define FACTMAX 12
  190. # define FLUSHREQ    /* flush after every printf */
  191. typedef unsigned char uchar;
  192. # define itouc(x) ((uchar) x)
  193. # define uctoi(x) ((int) x)
  194.  
  195. # endif        /* PERKELM definition */
  196.  
  197. /******************************************************************/
  198. /*
  199.     the following are pretty much independent of any system
  200. */
  201.  
  202. # define INLINE        /* produce in line code for incs and decs */
  203. /* # define CURSES    */
  204. /* # define PLOT3     */
  205.